10 REM ************************

11 REM * TIME TEST FOR PI*E   *

12 REM ************************

14 CLS : LOCATE 10, 15

16 PRINT "CALCULATING MULTIPLICATION TIME - PLEASE WAIT"

20 PI = 3.14159265#: E = 2.7182818#: P3 = PI / 3

22 T1 = TIMER

28 FOR I = 1 TO 10000

30 Y1 = PI * E

32 Y1 = PI * E

34 Y1 = PI * E

36 Y1 = PI * E

38 Y1 = PI * E

40 Y1 = PI * E

42 Y1 = PI * E

44 Y1 = PI * E

46 Y1 = PI * E

48 Y1 = PI * E

50 Y1 = PI * E

52 Y1 = PI * E

54 Y1 = PI * E

56 Y1 = PI * E

58 Y1 = PI * E

60 Y1 = PI * E

62 Y1 = PI * E

64 Y1 = PI * E

66 Y1 = PI * E

68 Y1 = PI * E

70 Y1 = PI * E

72 Y1 = PI * E

74 Y1 = PI * E

76 Y1 = PI * E

78 Y1 = PI * E

80 Y1 = PI * E

82 Y1 = PI * E

84 Y1 = PI * E

86 Y1 = PI * E

88 Y1 = PI * E

90 NEXT I

92 T1 = TIMER - T1

94 PRINT : PRINT

96 PRINT "TIME REQUIRED FOR FLOATING POINT MULTIPLY = "; T1 / 300000!; "SECONDS."

99 END



